Option Explicit
Sub D_Sample017()
    Dim myRng As Range
    Set myRng = Range("Z100")				'Nxs
    'ǳƨ즹
    Application.Goto Reference:=myRng, Scroll:=True
    Set myRng = Nothing						'
End Sub

